home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Camelot / Camelot 070 (1990-04)(Swedish User Group of Amiga)(SE)(PD)[WB].zip / Camelot 070 (1990-04)(Swedish User Group of Amiga)(SE)(PD)[WB].adf / Rask / test.txt < prev   
Text File  |  1990-03-02  |  436b  |  21 lines

  1.  
  2. echo "Testing RAsk program ..."
  3.  
  4. rask "Have you seen my fluffy brown martian baby doll?"
  5. if WARN
  6. echo "You have?!  Good kill it."
  7. else
  8. echo "I have, boy is it UGLY!"
  9. endif
  10.  
  11.  
  12. rask "How many IBM's does it take to make an Amiga?" " 5 " " 10 "
  13. if WARN
  14. echo "5 is right, but only if you are using segment/offset pointers."
  15. else
  16. echo "10 is right, but only if you are using segment/offset pointers."
  17. endif
  18.  
  19. echo "The test is finished now."
  20.  
  21.